﻿Public Class GeneralBE
    Dim strCodigo As String
    Dim strDescripcion As String

    Dim strParam1 As String
    Dim strParam2 As String
    Dim strUsu As String


    Public Sub New()

    End Sub

    Public Property Codigo() As String
        Get
            Return strCodigo
        End Get
        Set(ByVal value As String)
            strCodigo = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return strDescripcion
        End Get
        Set(ByVal value As String)
            strDescripcion = value
        End Set
    End Property

    Public Property Param1() As String
        Get
            Return strParam1
        End Get
        Set(ByVal value As String)
            strParam1 = value
        End Set
    End Property

    Public Property Param2() As String
        Get
            Return strParam2
        End Get
        Set(ByVal value As String)
            strParam2 = value
        End Set
    End Property

    Public Property Usu() As String
        Get
            Return strUsu
        End Get
        Set(ByVal value As String)
            strUsu = value
        End Set
    End Property
End Class
